home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / internet / irc_i_dodatki / phoenix / install_phoenix < prev    next >
Text File  |  1996-11-27  |  7KB  |  243 lines
  1. ; Install_Phoenix -- Installer script for PhoEniX-AmIRC
  2. ; $VER: Install_Phoenix 1.17 (27.11.96) by |Paladin|
  3. ;
  4. (set #ver "1.17"
  5.      #app-name (cat @app-name " v"#ver"+")
  6. )
  7. (complete 0)
  8. (welcome "\nWelcome to the "#app-name" installer.")
  9. (if (< 39 (/ 65536 (getversion "exec.library" (resident))))
  10.     (abort (#app-name" requires AmigaOS 3.0 (V39) or later."))
  11. )
  12. (message 
  13.         "-- WARNING --\n\n"
  14.          "Existing files will be over-written.  If you wish to make a backup"
  15.          " of any of your old Phoenix installation abort now and do so.\n\n\n"
  16.          "This script was designed for use with:\n\nInstaller 43.3 (04/30/96)"
  17. )
  18. (set
  19.     @copylib-help "Experts don't need help with this."
  20.     @copyfiles-help (@copylib-help)
  21.     #source-dir (if (= 1 (exists @icon)) (pathonly @icon) (@icon))
  22.     #default-dir (if (= 2 (exists "AmiTCP:" (noreq))) ("AmiTCP:") ("DH0:"))
  23.     @default-dest (askdir
  24.         (prompt "Where is AmIRC installed?")
  25.         (help "    Choose the directory where your existing install"
  26.               " of AmIRC is located.  This directory should contain"
  27.               " a rexx/ subdirectory."
  28.         )
  29.         (default #default-dir)
  30.     )
  31.     #dest-rexx (tackon @default-dest "rexx")
  32.     #dest-snd (tackon @default-dest "Sounds")
  33.     #dest-libs (if (= 2 @user-level)
  34.         (askdir
  35.             (prompt "Where should Libraries be installed?")
  36.             (help "    Choose a directory to install the libraries used"
  37.                   " by "@app-name".  Version numbers will be checked before"
  38.                   " overwriting existing files."
  39.             )
  40.             (default "LIBS:")
  41.         )
  42.         ("LIBS:")
  43.     )
  44.     #dest-mui (if (= 2 (exists "MUI:" (noreq))) ("MUI:")
  45.         (askdir
  46.             (prompt "Where is MUI installed?")
  47.             (help "    Choose the root directory where MUI is installed."
  48.                   " Normally there should be an assigned MUI:, but it is"
  49.                   " not currently visible to this installer."
  50.             )
  51.             (default #default-dir)
  52.         )
  53.     )
  54. )
  55. (complete 12)
  56. (foreach "Libs" "#?"
  57.     (copylib
  58.         (source (cat "Libs/" @each-name))
  59.         (dest #dest-libs)
  60.         (if (= 2 @user-level)
  61.             (
  62.                 (prompt "Copying "@each-name"...")
  63.                 (help @copylib-help)
  64.                 (confirm)
  65.             )
  66.         )
  67.     )
  68. )
  69. (complete 21)
  70. (if (< 2 (exists #dest-snd (noreq)))
  71.     (set #dest-snd
  72.         (askdir
  73.             (prompt "Where are your Sounds installed?")
  74.             (help "    Select the same Sound directory that you have AmIRC"
  75.                   " configured to use.  If you don't have a Sounds/ directory"
  76.                   " then create one."
  77.             )
  78.             (default @default-dest)
  79.         )
  80.     )
  81. )
  82. (complete 25)
  83. (copyfiles
  84.     (source "bin/Sounds")
  85.     (dest #dest-snd)
  86.     (all)
  87. )
  88. (complete 30)
  89. (copyfiles
  90.     (source "bin/rexx")
  91.     (dest #dest-rexx)
  92.     (all)
  93. )
  94. (complete 42)
  95. (if (= 1 (askbool
  96.         (prompt "Install documentation?")
  97.         (help "If you've never used "@app-name" before you'll be a typing"
  98.               " monkey without first reading the docs."
  99.         )
  100.     ) )
  101.     (copyfiles
  102.         (source #source-dir)
  103.         (dest @default-dest)
  104.         (pattern "Phoenix.#?")
  105.         (files)
  106.         (infos)
  107.         (noposition)
  108.     )
  109. )
  110. (complete 52)
  111. (copyfiles
  112.     (source "bin")
  113.     (dest @default-dest)
  114.     (pattern "#?")
  115.     (files)
  116.     (infos)
  117.     (noposition)
  118. )
  119. (complete 60)
  120. (copyfiles
  121.     (source "MUI")
  122.     (dest #dest-mui)
  123.     (all)
  124.     (if (= 2 @user-level)
  125.         (
  126.             (prompt "MUI utilities")
  127.             (help "    MUIRexx is required by "@app-name" for the "
  128.                   "/CONFIG plus other GUI commands and is highly recommended."
  129.             )
  130.             (confirm)
  131.         )
  132.     )
  133. )
  134. (complete 68)
  135. (copyfiles
  136.     (source "WBStartup")
  137.     (dest "SYS:WBStartup")
  138.     (all)
  139.     (infos)
  140.     (noposition)
  141.     (if (= 2 @user-level)
  142.         (
  143.             (prompt "Programs that need to start on bootup in WBStartup")
  144.             (help "    RPStart is the RexxMast of RexxPlus, it is"
  145.                   " required for "@app-name" to run."
  146.             )
  147.             (confirm)
  148.         )
  149.     )
  150. )
  151. (complete 70)
  152. (if (= 2 @user-level)
  153.     (
  154.         (set
  155.             #yes (askbool
  156.                 (prompt "Make changes to Phoenix.cfg?")
  157.                 (help "    This will overwrite the stock config with one"
  158.                       " that uses the same directories that you selected"
  159.                       " during this install."
  160.                 )
  161.             )
  162.         )
  163.     )
  164.     (set #yes 1)
  165. )
  166. (if (= 1 #yes)
  167.     (
  168.         (textfile
  169.             (dest (tackon @default-dest ".phoenix.cfg"))
  170.             (append
  171.                 (cat
  172.                     "/* Configuration file for PhoEniX-AmIRC v"#ver"  */\n"
  173.                     "/* (   *** Order & spacing are critical ***  ) */\n"
  174.                     "autoj=2;autop=1;delop=1;autobk=1;autoc=1;xdcc=1;xkick=0;xsnd=0;reqsnd=0\n"
  175.                     "floodp=1;cprot=1;nhp=0;chain=0;friendp=2;noscrew=0;revenge=0;war=0\n"
  176.                     "autoget=2;autom=0;sec=1;verb=1;sic=1;bseen=1;bgops=1;bmode=1\n"
  177.                     "xlimit=5;reset=4\n"
  178.                     "igtime=2;sens.PRIVMSG=15;sens.NOTICE=15;sens.CTCP=4;sens.DEOP=5;sens.KICK=8\n"
  179.                     "btype=\'N\';bkey=\'!\'\n"
  180.                     "phxdir=\""@default-dest"\"\n"
  181.                     "flist=\".phoenix.friend\";elist=\".phoenix.enemy\"\n"
  182.                          "xlist=\".phoenix.xdcc\";alist=\".phoenix.away\";slist=\".phoenix.seen\"\n"
  183.                     "abkmsg=\"| Auto BKick |\";revmsg=\"| Re\\/enge |\";xkmsg=\"| XDCC Kick |\"\n"
  184.                     "frimsg=\"| Don\'t mess with my friends! |\";reqkmsg=\"| Requested Kick |\"\n"
  185.                     "cfmsg=\"| Flood |\"\n"
  186.                     "flmsg=\"You\'ve triggered my Flood Protection!  Ignoring you.\"\n"
  187.                     "wkmsg=\"| Wordkick |\"\n"
  188.                 )
  189.             )
  190.         )
  191.     )
  192. )
  193. (complete 88)
  194. (if (= 2 @user-level)
  195.     (
  196.         (set
  197.             #yes (askbool
  198.                 (prompt "Make changes to Phoenix.amirx?")
  199.                 (help "    This will overwrite the stock communication script"
  200.                       " with one that uses the same directories that you selected"
  201.                       " during this install."
  202.                 )
  203.             )
  204.         )
  205.     )
  206.     (set #yes 1)
  207. )
  208. (if (= 1 #yes)
  209.     (
  210.         (textfile
  211.             (dest (cat #dest-rexx "/Phoenix.amirx"))
  212.             (append
  213.                 (cat
  214.                     "/*\\\n"
  215.                     " * Phoenix.amirx -- AmIRC to Phoenix interface\n"
  216.                     " * Usage  : change your Event ANY/JOIN/KICK/MODE/INVITE settings to\n"
  217.                     " *        : \"phoenix.amirx %p\" & edit .phoenix.cfg to suit your needs.\n"
  218.                     " * $VER: PhoEniX.amirx "#ver" (27.11.96) by |Paladin|\n"
  219.                     "\\*/\n"
  220.                     "options results;parse arg line;p=address();parse var p .'.'p2\n"
  221.                     "n=\'PHOENIX.\'p2\n"
  222.                     "if ~show(\'P\',n) then do;"
  223.                     "if ~show(\'L\',\'rexxsupport.library\') then if ~addlib(\'rexxsupport.library\',0,-30,0) then do;"
  224.                     "\'echo P=\'phx\' \'d2c(2)\'FATAL ERROR:\'d2c(2)\' Unable to load rexxsupport.library.\'\n"
  225.                     "exit;end;forbid();address command;\'run >nil: rexx/Phoenix >>ram:Phoenix.err \'p2\' "@default-dest"\'\n"
  226.                     "\'waitforport \'n\n"
  227.                     "address;if ~show(\'P\',n) then \'echo P=\'d2c(27)\'b«PhoEniX» Unable to start Phoenix\'\n"
  228.                     "permit();exit;end;address(n)\n"
  229.                     "p line\n"
  230.                 )
  231.             )
  232.         )
  233.     )
  234. )
  235. (complete 100)
  236. (exit
  237.     "\nInstallation Complete!\n"
  238.     @app-name" may be found in your "@default-dest" directory (or partition).\n\n"
  239.     "Please read the docs for configuration instructions.\n\n"
  240.     "A reboot will be required before "@app-name" will run correctly."
  241.     (quiet)
  242. )
  243.